home *** CD-ROM | disk | FTP | other *** search
/ CD Actual 1 / PC Actual CD 01.iso / share / dos / graficos / povray / flame.pov < prev    next >
Encoding:
Text File  |  1994-04-05  |  1.6 KB  |  53 lines
  1. //=============== FLAME WALL =============================================
  2.  
  3. #include "colors.inc"
  4. #include "textures.inc"
  5.  
  6. // parameters to change the 'look' of the fire:
  7.  
  8. #declare t = 0.25 //turbulence value
  9. #declare o = 0.85 // omega value, higher means more detailed flames
  10.  
  11. #declare w = 4/3  // Width of the flame-wall (Height = 1)
  12. #declare a = 1.0 // z-position where flame is rendered,
  13.                 // this allows animation of the flame by increasing
  14.                 // this value slightly, haven't tried it yet.
  15.  
  16. #declare Square_Z =  /* Scale-able plane in z */
  17.   union
  18.    {triangle {<-1, 1, 0>, <1, -1, 0>, <-1, -1, 0>}
  19.     triangle {<-1, 1, 0>, <1, -1, 0>, < 1,  1, 0>}
  20.    }
  21.  
  22. camera {
  23.    location  <0, 0,-250>
  24.    direction <0, 0,  15>
  25.    up        <0, 1,  0>
  26.    right   <4/3, 0,  0>
  27.    look_at   <0, 0, 0>
  28. }
  29.  
  30. object {Square_Z
  31.         scale <w/5,1/5,1/5>
  32.         translate <0,1/2+1/8,-a>
  33.         pigment { gradient y
  34.                   color_map {
  35.                         [0 color Clear]
  36.                         [0.2 color Yellow]
  37.                         [0.3 color Yellow]
  38.                         [0.55 color Red filter 0.3]
  39.                         [0.65 color Red filter 1]
  40.                         [0.75 color Clear]
  41.                         [1 color Clear]
  42.                             }
  43.                   scale <1,5,5>
  44.                   omega o
  45.                   turbulence t
  46.                   scale <1,1/5,1/5>
  47.                   scale <0.3,1,1>
  48.                 }
  49.         finish {Luminous}
  50.         translate <0,-1/2-1/8,a>
  51.         scale 40
  52.         }
  53.